0 IFA=0THENA=1:LOAD" TREASURES3",8,1
1 POKE53281,8:POKE53280,8
2 PRINT"[147][196][213][206][199][197][207][206][211]"
3 PRINT"&"
4 PRINT"[196][210][193][199][207][206][211]"
5 PRINT"[158][194]Y [212]HE [194]ALRON"
6 PRINT"[144][163][163][183][183][184][184][184][184][184][184][184][183][183][163][163]"
7 PRINT"[158]1.[200]ITS"
8 PRINT"2.[206]AMES"
9 PRINT"3.[205]ISC.[205]AGIC [215]EAPONS"
10 PRINT"4.[205]AIN [205]ENU"
11 SYS49152
12 GETA$:IFA$=""THEN12
13 IFA$="1"THEN18
14 IFA$="2"THEN79
15 IFA$="3"THEN185
16 IFA$="4"THEN289
17 IFA$<>"1"ANDA$<>"2"ANDA$<>"3"ANDA$<>"4"THEN12
18 CLR
19 A$(1)="[204]EFT LEG":A$(2)="[210]IGHT LEG":B$(1)="[204]EFT SIDE":D$(1)="[198]ACE":D$(2)="[206]ECK
20 B$(2)[178]"(null)IGHT SIDE":C$(1)[178]"(null)EFT ARM":C$(2)[178]"(null)IGHT ARM":E$(1)[178]"(null)EFT FINGERS"
21 E$(2)[178]"(null)IGHT FINGERS"
22 [151]53281,15:[151]53280,15
23 V[178]53248:[153]"LOADSTOP"
24 [151]V[170]23,63
25 [151]V[170]21,63
26 [151]V,150:[151]V[170]1,100:[151]V[170]39,11
27 [151]V[170]2,150:[151]V[170]3,140:[151]V[170]40,00
28 [151]V[170]4,150:[151]V[170]5,104:[151]V[170]41,12
29 [151]V[170]6,150:[151]V[170]7,140:[151]V[170]42,10
30 [151]V[170]8,150:[151]V[170]9,100:[151]V[170]43,11
31 [151]V[170]10,150:[151]V[170]11,100:[151]V[170]44,10
32 [151]2040,192:[151]2041,193:[151]2042,194:[151]2043,195:[151]2044,196:[151]2045,197
33 [153]"STR$OES THE CHARACTER HAVE A HELMET (Y/N)"
34 [161]A$:[139]A$[178]""[167]34
35 [139]A$[178]"Y"[167]HE[178]1:[137]40
36 [139]A$[178]"N"[167]HE[178]0:[137]39
37 [139]A$[179][177]"Y"[175]A$[179][177]"N"[167]34
38 [128]
39 [151]2044,198:[151]2045,199:[151]V[170]43,10:[151]V[170]44,9
40 [143]
41 [143] ** DICING **
42 [153]"STR$O YOU WANT TO THROW A HIT ROLL (Y/N)"
43 [161]A$:[139]A$[178]""[167]43
44 [139]A$[178]"Y"[167]48
45 [139]A$[178]"N"[167]52
46 [139]A$[179][177]"Y"[175]A$[179][177]"N"[167]43
47 [128]
48 X[178][181](20[172][187](TI)[170]1)
49 [153]"LOAD"
50 [153]"LEFT$IT ROLL = "X
51 [137]57
52 [133]"LEFT$IT ROLL";X
53 [139]X[179]1[176]X[177]20[167]52
54 [153]"LEFT$IT ROLL = "X
55 [153]"LOAD"
56 [153]"LEFT$IT ROLL = "X
57 [139]X[178]1[167][153]"YOU HIT YOUR WEAPON ON THE GROUND"
58 [139]X[178]2[167][153]"IF YOU HIT THEN VICTIM TAKES 1/3 DAMAGE":[151]V[170]42,1
59 [139]X[178][177]3[175]X[179][178]9[167][153]"IF YOU HIT THEN VICTIM TAKES 1/2 DAMAGE":[151]V[170]40,1
60 [139]X[178][177]10[175]X[179][178]14[167][153]"IF YOU HIT THEN VICTIM TAKES FULL DAMAGE":[151]V[170]41,1
61 [139]X[178][177]15[175]X[179][178]18[167][153]"IF YOU HIT THEN VICTIM TAKES FULL DAMAGE":[151]V[170]39,1
62 [139]HE[178]0[167][139]X[178]19[167][153]"IF YOU HIT THEN DOUBLE THE DAMAGE":[151]V[170]43,1
63 [139]HE[178]0[167][139]X[178]20[167][153]"IF YOU HIT THEN TRIPLE THE DAMAGE":[151]V[170]43,1
64 [139]HE[178]1[167][139]X[178]19[167][153]"THE HELMET STOPS YOUR SWING":[151]V[170]43,1
65 [139]HE[178]1[167][139]X[178]20[167][153]"YOUR WEAPON PIERCES HELMET:2 * DAMAGE":[151]V[170]44,1
66 Y[178][181](2[172][187](TI)[170]1)
67 [139]X[178]2[167][153]"STR$AMAGE TO ";E$(Y)
68 [139]X[178][177]3[175]X[179][178]9[167][153]"STR$AMAGE TO ";A$(Y)
69 [139]X[178][177]10[175]X[179][178]14[167][153]"STR$AMAGE TO ";C$(Y)
70 [139]X[178][177]15[175]X[179][178]18[167][153]"STR$AMAGE TO ";B$(Y)
71 [139]HE[178]0[167][139]X[178][177]19[175]X[179][178]20[167][153]"STR$AMAGE TO ";D$(Y)
72 [139]HE[178]1[175]X[178]19[167][153]"1/4 DAMAGE"
73 [139]HE[178]1[167][139]X[178]20[167][153]"STR$AMAGE TO FACE"
74 [153]"(null)EW VICTIM (Y/N)"
75 [161]A$:[139]A$[178]""[167]75
76 [139]A$[178]"Y"[167]22
77 [139]A$[178]"N"[167][151]V[170]21,0:[137]1
78 [139]A$[179][177]"Y"[175]A$[179][177]"N"[167]75
79 [156]:[153]"LOAD(null)AME OF MAN/WOMAN: ";
80 X[178][181](100[172][187](TI)[170]1)
81 [139]X[178]1[167][153]"PEEKOROMIR"
82 [139]X[178]2[167][153]"(null)GLUK"
83 [139]X[178]3[167][153]"(null)ARUMAN"
84 [139]X[178]4[167][153]"CHR$RISHNAKH"
85 [139]X[178]5[167][153]"(null)EGOLAS"
86 [139]X[178]6[167][153]"CHR$IMLI"
87 [139]X[178]7[167][153]"CHR$LOIN"
88 [139]X[178]8[167][153]"ASCARAMIR"
89 [139]X[178]9[167][153]"CHR$ANDALF"
90 [139]X[178]10[167][153]"ASCANGORN"
91 [139]X[178]11[167][153]"CHR$WAIHIR (null)UULIRUHTINAS"
92 [139]X[178]12[167][153]"CHR$ALADRIEL"
93 [139]X[178]13[167][153]"LEFT$ASUFEL"
94 [139]X[178]14[167][153]"ATNROD"
95 [139]X[178]15[167][153]"(null)HEODEN"
96 [139]X[178]16[167][153]"LENELEBORN"
97 [139]X[178]17[167][153]"LEFT$AMA"
98 [139]X[178]18[167][153]"CHR$RIMA"
99 [139]X[178]19[167][153]"VALOWYN"
100 [139]X[178]20[167][153]"VALOMER"
101 [139]X[178]21[167][153]"(null)AMWISE"
102 [139]X[178]22[167][153]"(null)MEAGOL"
103 [139]X[178]23[167][153]"(null)ERIADOC"
104 [139]X[178]24[167][153]"(null)EREGRIN"
105 [139]X[178]25[167][153]"LENREOL"
106 [139]X[178]26[167][153]"VALDORAS"
107 [139]X[178]27[167][153]"LEFT$ELM VASARAKOURA"
108 [139]X[178]28[167][153]"CHR$ARALD THE BLUE"
109 [139]X[178]29[167][153]"(null)IR (null)UFUS ASCORTHRIGHT"
110 [139]X[178]30[167][153]"VALLIZABETH ASCORTHRIGHT"
111 [139]X[178]31[167][153]"(null)IR LEFT$UGH (null)RITCHARD"
112 [139]X[178]32[167][153]"(null)IR STR$ANALANE"
113 [139]X[178]33[167][153]"(null)OTHER STR$ARKNESS"
114 [139]X[178]34[167][153]"MID$AVYA STR$AYSTAR"
115 [139]X[178]35[167][153]"ASCLIP"
116 [139]X[178]36[167][153]"ATNZOS CHR$REATHAND"
117 [139]X[178]37[167][153]"(null)SOGGA (null)ARSH"
118 [139]X[178]38[167][153]"ATNLLYCIA"
119 [139]X[178]39[167][153]"(null)CUD THE RIGHT$NVICIBLE"
120 [139]X[178]40[167][153]"(null)NARF"
121 [139]X[178]41[167][153]"(null)ELERIE"
122 [139]X[178]42[167][153]"(null)OLMER"
123 [139]X[178]43[167][153]"PEEKRUFUS"
124 [139]X[178]44[167][153]"(null)R PEEK.PEEK.PEEKIRD"
125 [139]X[178]45[167][153]"(null)UTHAZE"
126 [139]X[178]46[167][153]"CHR$RUUMSH"
127 [139]X[178]47[167][153]"CHR$IL-GALAD"
128 [139]X[178]48[167][153]"(null)HARGAAS"
129 [139]X[178]49[167][153]"RIGHT$LNEVAL"
130 [139]X[178]50[167][153]"(null)HOR"
131 [139]X[178]51[167][153]"(null)HENGEL"
132 [139]X[178]52[167][153]"(null)UNGO"
133 [139]X[178]53[167][153]"(null)INDA"
134 [139]X[178]54[167][153]"ASCALCO"
135 [139]X[178]55[167][153]"(null)ARGO"
136 [139]X[178]56[167][153]"CHR$RIFFO PEEKOFFIN"
137 [139]X[178]57[167][153]"(null)OTHO"
138 [139]X[178]58[167][153]"ASCILIBERT PEEKOLGER"
139 [139]X[178]59[167][153]"(null)ANCHO"
140 [139]X[178]60[167][153]"STR$ROGO"
141 [139]X[178]61[167][153]"STR$UDO"
142 [139]X[178]62[167][153]"PEEKANDOBRAS"
143 [139]X[178]63[167][153]"RIGHT$SENGRIM"
144 [139]X[178]64[167][153]"PEEKILBO PEEKAGGINS"
145 [139]X[178]65[167][153]"ASCERUMBRAS"
146 [139]X[178]66[167][153]"ASCORTINBRAS"
147 [139]X[178]67[167][153]"RIGHT$SENGAR"
148 [139]X[178]68[167][153]"STR$URIN"
149 [139]X[178]69[167][153]"(null)HRAIN"
150 [139]X[178]70[167][153]"PEEKORIN"
151 [139]X[178]71[167][153]"STR$AIN RIGHT$RIGHT$ (null)AUTAJALKA"
152 [139]X[178]72[167][153]"CHR$ROR"
153 [139]X[178]73[167][153]"ASCARIN"
154 [139]X[178]74[167][153]"(null)HROR"
155 [139]X[178]75[167][153]"(null)AURON"
156 [139]X[178]76[167][153]"(null)YARG"
157 [139]X[178]77[167][153]"(null)RBID"
158 [139]X[178]78[167][153]"(null)PIKK"
159 [139]X[178]79[167][153]"LEFT$URT"
160 [139]X[178]80[167][153]"STR$ARKET"
161 [139]X[178]81[167][153]"ATNNGOK"
162 [139]X[178]82[167][153]"(null)LYSS"
163 [139]X[178]83[167][153]"CHR$ORB"
164 [139]X[178]84[167][153]"(null)AMIG"
165 [139]X[178]85[167][153]"(null)INGE"
166 [139]X[178]86[167][153]"(null)ANGLIT"
167 [139]X[178]87[167][153]"ASCLETCH"
168 [139]X[178]88[167][153]"(null)RRIK PEEKLOODBASHER"
169 [139]X[178]89[167][153]"STR$IGLAD (null)ANMINCER"
170 [139]X[178]90[167][153]"(null)ALGRUNT (null)PEARCREST"
171 [139]X[178]91[167][153]"(null)ICBLOC (null)ITCHSTAFF"
172 [139]X[178]92[167][153]"VALDDRIC STR$WARFCUTTER"
173 [139]X[178]93[167][153]"PEEKICDIG (null)IVERIPPER"
174 [139]X[178]94[167][153]"STR$IRKSOD STR$WARFHATER"
175 [139]X[178]95[167][153]"(null)ANDIC VALLFSICKLE"
176 [139]X[178]96[167][153]"ASCHLASSA (null)AY"
177 [139]X[178]97[167][153]"VALLMINSTER (null)ELOKAS"
178 [139]X[178]98[167][153]"(null)ELAZZAR"
179 [139]X[178]99[167][153]"(null)ITHANALOR"
180 [139]X[178]100[167][153]"(null)ADAGAST THE PEEKROWN"
181 [161]A$:[139]A$[178]""[167]181
182 [139]A$[178][199](32)[167]79
183 [139]A$[178][199](13)[167]1
184 [139]A$[179][177][199](13)[175]A$[179][177][199](32)[167]181
185 [156]:[153]"LOAD":[141]288
186 [139]X[179][178]9[167][153]"BATTLE AXE";:WC[178]3
187 [139]X[178][177]10[175]X[179][178]15[167][153]"HAND AXE";:WC[178]2
188 [139]X[178][177]16[175]X[179][178]17[167][153]"HAND AXE RETURNING";:WC[178]2
189 [139]X[178][177]18[175]X[179][178]20[167][153]"BLACKJACK";:WC[178]3
190 [139]X[178][177]21[175]X[179][178]22[167][153]"BOLA";:WC[178]2
191 [139]X[178]23[167][153]"BOLA RETURNING";:WC[178]2
192 [139]X[178][177]24[175]X[179][178]28[167][153]"CLUB";:WC[178]3
193 [139]X[178][177]29[175]X[179][178]40[167][153]"DAGGER";:WC[178]2
194 [139]X[178][177]41[175]X[179][178]43[167][153]"DAGGER RETURNING";:WC[178]2
195 [139]X[178][177]44[175]X[179][178]46[167][153]"JAVELIN";:WC[178]2
196 [139]X[178]47[167][153]"JAVELIN RETURNING";:WC[178]2
197 [139]X[178][177]48[175]X[179][178]51[167][153]"LANCE";:WC[178]4
198 [139]X[178][177]52[175]X[179][178]63[167][153]"MACE";:WC[178]3
199 [139]X[178][177]64[175]X[179][178]65[167][153]"NET";:WC[178]2
200 [139]X[178]66[167][153]"NET RETURNING";:WC[178]2
201 [139]X[178][177]67[175]X[179][178]71[167][153]"POLE ARM";:WC[178]4
202 [139]X[178][177]72[175]X[179][178]81[167][153]"SPEAR OR TRIDENT";:WC[178]2
203 [139]X[178][177]82[175]X[179][178]84[167][153]"SPEAR OR TRIDENT RETURNING";:WC[178]2
204 [139]X[178][177]85[175]X[179][178]94[167][153]"WAR HAMMER";:WC[178]3
205 [139]X[178][177]95[175]X[179][178]97[167][153]"WAR HAMMER RETURNING";:WC[178]3
206 [139]X[178][177]98[175]X[179][178]100[167][153]"WHIP";:WC[178]3
207 [143] *******
208 [139]WC[179][177]2[167]216
209 [141]288
210 [139]X[179][178]50[167][153]"+1";:CB[178]40
211 [139]X[178][177]51[175]X[179][178]74[167][153]"+2";:CB[178]30
212 [139]X[178][177]75[175]X[179][178]88[167][153]"+3";:CB[178]20
213 [139]X[178][177]89[175]X[179][178]96[167][153]"+4";:CB[178]15
214 [139]X[178][177]97[175]X[179][178]100[167][153]"+5";:CB[178]10
215 [137]232
216 [143] *******
217 [139]WC[179][177]3[167]225
218 [141]288
219 [139]X[179][178]60[167][153]"+1";:CB[178]40
220 [139]X[178][177]61[175]X[179][178]81[167][153]"+2";:CB[178]30
221 [139]X[178][177]82[175]X[179][178]92[167][153]"+3";:CB[178]20
222 [139]X[178][177]93[175]X[179][178]98[167][153]"+4";:CB[178]15
223 [139]X[178][177]99[175]X[179][178]100[167][153]"+5";:CB[178]10
224 [137]232
225 [143] *******
226 [141]288
227 [139]X[179][178]70[167][153]"+1";:CB[178]40
228 [139]X[178][177]71[175]X[179][178]88[167][153]"+2";:CB[178]30
229 [139]X[178][177]89[175]X[179][178]96[167][153]"+3";:CB[178]20
230 [139]X[178][177]97[175]X[179][178]99[167][153]"+4";:CB[178]15
231 [139]X[178]100[167][153]"+5";:CB[178]10
232 [141]288
233 [139]X[177]CB[167]283
234 [139]CB[178]10[167]260
235 [143] *********
236 S[178][181](100[172][187](TI)[170]1)
237 [139]S[179][178]29[167][153]"+1 VS.";
238 [139]S[178][177]30[175]S[179][178]50[167][153]"+2 VS.";
239 [139]S[178][177]51[175]S[179][178]64[167][153]"+3 VS.";
240 [139]S[178][177]65[175]S[179][178]72[167][153]"+4 VS.";
241 [139]S[178][177]73[175]S[179][178]75[167][153]"+5 VS.";
242 [139]S[178][177]76[175]S[179][178]100[167][153]" + ";:[137]260
243 [143] *** OPPONENTS ***
244 I[178][181](100[172][187](TI)[170]1)
245 [139]I[179][178]6[167][153]"PEEKUGS"
246 [139]I[178][177]7[175]I[179][178]9[167][153]"LENONSTRUCTS"
247 [139]I[178][177]10[175]I[179][178]15[167][153]"STR$RAGONS"
248 [139]I[178][177]16[175]I[179][178]24[167][153]"VALNCHANTED MONSTERS"
249 [139]I[178][177]25[175]I[179][178]36[167][153]"CHR$IANTS"
250 [139]I[178][177]37[175]I[179][178]48[167][153]"(null)YCANTHROPES"
251 [139]I[178][177]49[175]I[179][178]52[167][153]"(null)THER-PLANAR CREATURES"
252 [139]I[178][177]53[175]I[179][178]58[167][153]"(null)EGENERATING LENREATURES"
253 [139]I[178][177]59[175]I[179][178]67[167][153]"(null)EPTILES (AND STR$INOSAURS)"
254 [139]I[178][177]68[175]I[179][178]70[167][153]"(null)PELL RIGHT$MMUNE CREATURES"
255 [139]I[178][177]71[175]I[179][178]76[167][153]"(null)PELL (null)SERS"
256 [139]I[178][177]77[175]I[179][178]88[167][153]"(null)NDEAD"
257 [139]I[178][177]89[175]I[179][178]94[167][153]"(null)ATER-PEEKREATHING LENREATURES"
258 [139]I[178][177]95[175]I[179][178]100[167][153]"(null)EAPON-(null)SING LENREATURES"
259 [137]283
260 [143] *** TALENT ***
261 P[178][181](100[172][187](TI)[170]1)
262 [139]P[179][178]5[167][153]"PEEKREATHING"
263 [139]P[178][177]6[175]P[179][178]12[167][153]"LENHARMING"
264 [139]P[178][177]13[175]P[179][178]16[167][153]"STR$ECEIVING"
265 [139]P[178][177]17[175]P[179][178]23[167][153]"STR$EFENDING"
266 [139]P[178][177]24[175]P[179][178]25[167][153]"STR$EFLECTOR"
267 [139]P[178][177]26[175]P[179][178]27[167][153]"STR$RAINING"
268 [139]P[178][177]28[175]P[179][178]32[167][153]"VALXTINGUISHING"
269 [139]P[178][177]33[175]P[179][178]38[167][153]"ASCINDING"
270 [139]P[178][177]39[175]P[179][178]43[167][153]"ASCLAMING"
271 [139]P[178][177]44[175]P[179][178]46[167][153]"ASCLYING"
272 [139]P[178][177]47[175]P[179][178]54[167][153]"LEFT$EALING"
273 [139]P[178][177]55[175]P[179][178]59[167][153]"LEFT$IDING"
274 [139]P[178][177]60[175]P[179][178]65[167][153]"LEFT$OLDING"
275 [139]P[178][177]66[175]P[179][178]73[167][153]"(null)IGHTNING"
276 [139]P[178][177]74[175]P[179][178]79[167][153]"(null)ILENCING"
277 [139]P[178][177]80[175]P[179][178]81[167][153]"(null)LICING"
278 [139]P[178][177]82[175]P[179][178]85[167][153]"(null)LOWING"
279 [139]P[178][177]86[175]P[179][178]89[167][153]"(null)PEEDING"
280 [139]P[178][177]90[175]P[179][178]94[167][153]"(null)RANSLATING"
281 [139]P[178][177]95[175]P[179][178]99[167][153]"(null)ATCHING"
282 [139]P[178]100[167][153]"(null)ISHING"
283 [153]
284 [161]A$:[139]A$[178]""[167]284
285 [139]A$[178][199](32)[167]185
286 [139]A$[178][199](13)[167]1
287 [139]A$[179][177][199](32)[175]A$[179][177][199](13)[167]284
288 X[178][181](100[172][187](TI)[170]1):[142]
289 [153]"LOAD"
290 [153]"FORL(null)"[199](34)" TREASURES1"[199](34)",8,1ONONONON":[141]291:[144]
291 [151]198,7:[151]631,13:[151]632,147:[151]633,82:[151]634,117:[151]635,9:[151]636,31:[151]637,13:[142]